home *** CD-ROM | disk | FTP | other *** search
/ The Frank Lloyd Wright Companion / The Frank Lloyd Wright Companion.iso / fullmacapps / macfllwc_small.sit / MacFLLWC_Small / flw.mvb.rsrc / CDEF_131_Incrementer CDEF.txt < prev    next >
Text File  |  1995-09-30  |  35KB  |  634 lines
  1. start:
  2. 00000000  4E56 FFCA                link       A6, -0x0036
  3. 00000004  0C78 3FFF 028E           cmpi.w     [0x0000028E /* ROM85 */], 0x3FFF
  4. 0000000A  57C0                     seq        D0
  5. 0000000C  4400                     neg.b      D0
  6. 0000000E  4880                     ext.w      D0
  7. 00000010  3D40 FFD0                move.w     [A6 - 0x30], D0
  8. 00000014  6052                     bra        +0x54 /* 00000068 */
  9. 00000016  7631                     moveq.l    D3, 0x31
  10. 00000018  2E31 2049                move.l     D7, [A1 + D2.w + 0x49]
  11. 0000001C  6E63                     bgt        +0x65 /* 00000081 */
  12. 0000001E  7265                     moveq.l    D1, 0x65
  13. 00000020  6D65                     blt        +0x67 /* 00000087 */
  14. 00000022  6E74                     bgt        +0x76 /* 00000098 */
  15. 00000024  6572                     bcs        +0x74 /* 00000098 */
  16. 00000026  2043                     movea.l    A0, D3
  17. 00000028  4445                     neg.w      D5
  18. 0000002A  4620                     not.b      -[A0]
  19. 0000002C  6279                     bhi        +0x7B /* 000000A7 */
  20. 0000002E  204A                     movea.l    A0, A2
  21. 00000030  6F72                     ble        +0x74 /* 000000A4 */
  22. 00000032  6461                     bcc        +0x63 /* 00000095 */
  23. 00000034  6E20                     bgt        +0x22 /* 00000056 */
  24. 00000036  5A69 6D6D                addq.w     [A1 + 0x6D6D], 5
  25. 0000003A  6572                     bcs        +0x74 /* 000000AE */
  26. 0000003C  6D61                     blt        +0x63 /* 0000009F */
  27. 0000003E  6E20                     bgt        +0x22 /* 00000060 */
  28. 00000040  2863                     movea.l    A4, -[A3]
  29. 00000042  2920                     move.l     -[A4], -[A0]
  30. 00000044  3139 3934 202D           move.w     -[A0], [0x3934202D]
  31. 0000004A  2041                     movea.l    A0, D1
  32. 0000004C  6C6C                     bge        +0x6E /* 000000BA */
  33. 0000004E  2072 6967                movea.l    A0, <<invalid full ext with IS == 1 and I/IS == 7>>
  34. 00000052  6874                     bvc        +0x76 /* 000000C8 */
  35. 00000054  7320                     moveq.l    D1, 0x20
  36. label00000056:
  37. 00000056  7265                     moveq.l    D1, 0x65
  38. 00000058  7365                     moveq.l    D1, 0x65
  39. 0000005A  7276                     moveq.l    D1, 0x76
  40. 0000005C  6564                     bcs        +0x66 /* 000000C2 */
  41. 0000005E  2077 6F72 6C64 7769 6465 movea.l    A0, [[A7 + 0x6C647769] + 0x6465]
  42. // begin alternate branch 00000060-00000068
  43. label00000060:
  44. 00000060  6F72                     ble        +0x74 /* 000000D4 */
  45. 00000062  6C64                     bge        +0x66 /* 000000C8 */
  46. 00000064  7769                     moveq.l    D3, 0x69
  47. 00000066  6465                     bcc        +0x67 /* 000000CD */
  48. // end alternate branch 00000060-00000068
  49. label00000060: // (misaligned)
  50. label00000068:
  51. 00000068  0C6E 000A 000C           cmpi.w     [A6 + 0xC], 0xA /* '\n' */
  52. 0000006E  670C                     beq        +0xE /* 0000007C */
  53. 00000070  0C6E 000B 000C           cmpi.w     [A6 + 0xC], 0xB
  54. 00000076  6704                     beq        +0x6 /* 0000007C */
  55. 00000078  7000                     moveq.l    D0, 0x00
  56. 0000007A  6002                     bra        +0x4 /* 0000007E */
  57. label0000007C:
  58. 0000007C  7001                     moveq.l    D0, 0x01
  59. label0000007E:
  60. 0000007E  3040                     movea.w    A0, D0
  61. 00000080  2D48 FFD2                move.l     [A6 - 0x2E], A0
  62. 00000084  486E FFF4                pea.l      [A6 - 0xC]
  63. 00000088  A874                     syscall    GetPort
  64. 0000008A  486E FFE2                pea.l      [A6 - 0x1E]
  65. 0000008E  A898                     syscall    GetPenState
  66. 00000090  A89E                     syscall    PenNormal
  67. 00000092  206E FFF4                movea.l    A0, [A6 - 0xC]
  68. 00000096  3D68 0044 FFCE           move.w     [A6 - 0x32], [A0 + 0x44]
  69. // begin alternate branch 00000098-0000009C
  70. label00000098:
  71. 00000098  0044 FFCE                ori.w      D4, 0xFFCE
  72. // end alternate branch 00000098-0000009C
  73. label00000098: // (misaligned)
  74. 0000009C  3D68 004A FFCC           move.w     [A6 - 0x34], [A0 + 0x4A]
  75. 000000A2  7000                     moveq.l    D0, 0x00
  76. label000000A4:
  77. 000000A4  1028 0046                move.b     D0, [A0 + 0x46]
  78. 000000A8  3D40 FFCA                move.w     [A6 - 0x36], D0
  79. 000000AC  4267                     clr.w      -[A7]
  80. label000000AE:
  81. 000000AE  A887                     syscall    TextFont
  82. 000000B0  4267                     clr.w      -[A7]
  83. 000000B2  A88A                     syscall    TextSize
  84. 000000B4  4267                     clr.w      -[A7]
  85. 000000B6  A888                     syscall    TextFace
  86. 000000B8  4A6E FFD0                tst.w      [A6 - 0x30]
  87. // begin alternate branch 000000BA-000000BC
  88. label000000BA:
  89. 000000BA  FFD0                     .extension 0xFD0 // unimplemented
  90. // end alternate branch 000000BA-000000BC
  91. label000000BA: // (misaligned)
  92. 000000BC  6718                     beq        +0x1A /* 000000D6 */
  93. 000000BE  486E FFD6                pea.l      [A6 - 0x2A]
  94. label000000C2:
  95. 000000C2  AA19                     syscall    GetForeColor
  96. 000000C4  486E FFDC                pea.l      [A6 - 0x24]
  97. label000000C8:
  98. 000000C8  AA1A                     syscall    GetBackColor
  99. 000000CA  4878 0021                push.l     0x21 /* '!' */
  100. 000000CE  A862                     syscall    ForeColor
  101. 000000D0  4878 001E                push.l     0x1E
  102. label000000D4:
  103. 000000D4  A863                     syscall    BackColor
  104. label000000D6:
  105. 000000D6  302E 000C                move.w     D0, [A6 + 0xC]
  106. 000000DA  0C40 000B                cmpi.w     D0, 0xB
  107. 000000DE  6200 00B8                bhi        +0xBA /* 00000198 */
  108. 000000E2  43FA 00EE                lea.l      A1, [PC + 0xEE /* 000001D2, value 0xFF2CFFA0 */]
  109. 000000E6  D040                     add.w      D0, D0
  110. 000000E8  D2F1 0000                add.w      A1, [A1 + D0.w]
  111. 000000EC  4ED1                     jmp        [A1]
  112. 000000EE  206E 000E                movea.l    A0, [A6 + 0xE]
  113. 000000F2  2050                     movea.l    A0, [A0]
  114. 000000F4  70FF                     moveq.l    D0, 0xFFFFFFFF
  115. 000000F6  2140 0020                move.l     [A0 + 0x20], D0
  116. 000000FA  6000 009C                bra        +0x9E /* 00000198 */
  117. 000000FE  4267                     clr.w      -[A7]
  118. 00000100  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  119. 00000104  A86B                     syscall    LoWord
  120. 00000106  3D5F FFFE                move.w     [A6 - 0x2], [A7]+
  121. 0000010A  0C6E 0014 FFFE           cmpi.w     [A6 - 0x2], 0x14
  122. 00000110  6700 0086                beq        +0x88 /* 00000198 */
  123. 00000114  0C6E 0015 FFFE           cmpi.w     [A6 - 0x2], 0x15
  124. 0000011A  677C                     beq        +0x7E /* 00000198 */
  125. 0000011C  3F2E FFFE                move.w     -[A7], [A6 - 0x2]
  126. 00000120  2F2E 000E                move.l     -[A7], [A6 + 0xE]
  127. 00000124  4EBA 00EC                jsr        [PC + 0xEC /* 00000212 */]
  128. 00000128  5C8F                     addq.l     A7, 6
  129. 0000012A  606C                     bra        +0x6E /* 00000198 */
  130. 0000012C  202E 0008                move.l     D0, [A6 + 0x8]
  131. 00000130  0280 FF00 0000           andi.l     D0, 0xFF000000
  132. 00000136  2D40 FFFC                move.l     [A6 - 0x4], D0
  133. 0000013A  222E 0008                move.l     D1, [A6 + 0x8]
  134. 0000013E  0281 00FF FFFF           andi.l     D1, 0xFFFFFF
  135. 00000144  2D41 0008                move.l     [A6 + 0x8], D1
  136. 00000148  4A80                     tst.l      D0
  137. 0000014A  661E                     bne        +0x20 /* 0000016A */
  138. 0000014C  206E 000E                movea.l    A0, [A6 + 0xE]
  139. 00000150  2050                     movea.l    A0, [A0]
  140. 00000152  2D68 0008 FFF8           move.l     [A6 - 0x8], [A0 + 0x8]
  141. 00000158  2D68 000C FFFC           move.l     [A6 - 0x4], [A0 + 0xC]
  142. 0000015E  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  143. 00000162  486E FFF8                pea.l      [A6 - 0x8]
  144. 00000166  A8DF                     syscall    RectRgn
  145. 00000168  602E                     bra        +0x30 /* 00000198 */
  146. label0000016A:
  147. 0000016A  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  148. 0000016E  A8DD                     syscall    SetEmptyRgn
  149. 00000170  6026                     bra        +0x28 /* 00000198 */
  150. 00000172  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  151. 00000176  2F2E 000E                move.l     -[A7], [A6 + 0xE]
  152. 0000017A  4EBA 0328                jsr        [PC + 0x328 /* 000004A4 */]
  153. 0000017E  508F                     addq.l     A7, 8
  154. 00000180  2D40 FFD2                move.l     [A6 - 0x2E], D0
  155. 00000184  6012                     bra        +0x14 /* 00000198 */
  156. 00000186  4267                     clr.w      -[A7]
  157. 00000188  2F2E 0008                move.l     -[A7], [A6 + 0x8]
  158. 0000018C  A86B                     syscall    LoWord
  159. 0000018E  2F2E 000E                move.l     -[A7], [A6 + 0xE]
  160. 00000192  4EBA 0376                jsr        [PC + 0x376 /* 0000050A */]
  161. 00000196  5C8F                     addq.l     A7, 6
  162. label00000198:
  163. 00000198  4A6E FFD0                tst.w      [A6 - 0x30]
  164. 0000019C  670C                     beq        +0xE /* 000001AA */
  165. 0000019E  486E FFD6                pea.l      [A6 - 0x2A]
  166. 000001A2  AA14                     syscall    RGBForeColor
  167. 000001A4  486E FFDC                pea.l      [A6 - 0x24]
  168. 000001A8  AA15                     syscall    RGBBackColor
  169. label000001AA:
  170. 000001AA  3F2E FFCE                move.w     -[A7], [A6 - 0x32]
  171. 000001AE  A887                     syscall    TextFont
  172. 000001B0  3F2E FFCC                move.w     -[A7], [A6 - 0x34]
  173. 000001B4  A88A                     syscall    TextSize
  174. 000001B6  3F2E FFCA                move.w     -[A7], [A6 - 0x36]
  175. 000001BA  A888                     syscall    TextFace
  176. 000001BC  486E FFE2                pea.l      [A6 - 0x1E]
  177. 000001C0  A899                     syscall    SetPenState
  178. 000001C2  2D6E FFD2 0014           move.l     [A6 + 0x14], [A6 - 0x2E]
  179. 000001C8  4E5E                     unlink     A6
  180. 000001CA  205F                     movea.l    A0, [A7]+
  181. 000001CC  4FEF 000C                lea.l      A7, [A7 + 0xC]
  182. 000001D0  4ED0                     jmp        [A0]
  183. 000001D2  FF2C                     .extension 0xF2C // unimplemented
  184. 000001D4  FFA0                     .extension 0xFA0 // unimplemented
  185. 000001D6  FF5A                     .extension 0xF5A // unimplemented
  186. 000001D8  FF1C                     .extension 0xF1C // unimplemented
  187. 000001DA  FFC6                     .extension 0xFC6 // unimplemented
  188. 000001DC  FFC6                     .extension 0xFC6 // unimplemented
  189. 000001DE  FFC6                     .extension 0xFC6 // unimplemented
  190. 000001E0  FFC6                     .extension 0xFC6 // unimplemented
  191. 000001E2  FFB4                     .extension 0xFB4 // unimplemented
  192. 000001E4  FFC6                     .extension 0xFC6 // unimplemented
  193. 000001E6  FF7A                     .extension 0xF7A // unimplemented
  194. 000001E8  FF98                     .extension 0xF98 // unimplemented
  195. fn000001EA:
  196. 000001EA  4E56 FFF8                link       A6, -0x0008
  197. 000001EE  206E 0008                movea.l    A0, [A6 + 0x8]
  198. 000001F2  2D50 FFF8                move.l     [A6 - 0x8], [A0]
  199. 000001F6  2D68 0004 FFFC           move.l     [A6 - 0x4], [A0 + 0x4]
  200. 000001FC  486E FFF8                pea.l      [A6 - 0x8]
  201. 00000200  2F3C 0001 0001           move.l     -[A7], 0x10001
  202. 00000206  A8A9                     syscall    InsetRect
  203. 00000208  486E FFF8                pea.l      [A6 - 0x8]
  204. 0000020C  A8A3                     syscall    EraseRect
  205. 0000020E  4E5E                     unlink     A6
  206. 00000210  4E75                     rts
  207. fn00000212:
  208. 00000212  4E56 FFD0                link       A6, -0x0030
  209. 00000216  48E7 0110                movem.l    -[A7], D7,A3
  210. 0000021A  206E 0008                movea.l    A0, [A6 + 0x8]
  211. 0000021E  2650                     movea.l    A3, [A0]
  212. 00000220  3E2B 0012                move.w     D7, [A3 + 0x12]
  213. 00000224  486E FFD0                pea.l      [A6 - 0x30]
  214. 00000228  486E FFD8                pea.l      [A6 - 0x28]
  215. 0000022C  486E FFE0                pea.l      [A6 - 0x20]
  216. 00000230  486E FFE8                pea.l      [A6 - 0x18]
  217. 00000234  486E FFF0                pea.l      [A6 - 0x10]
  218. 00000238  2F0B                     move.l     -[A7], A3
  219. 0000023A  4EBA 0146                jsr        [PC + 0x146 /* 00000382 */]
  220. 0000023E  302E 000C                move.w     D0, [A6 + 0xC]
  221. 00000242  4FEF 0018                lea.l      A7, [A7 + 0x18]
  222. 00000246  6B24                     bmi        +0x26 /* 0000026C */
  223. 00000248  0440 0015                subi.w     D0, 0x15
  224. 0000024C  6712                     beq        +0x14 /* 00000260 */
  225. 0000024E  6A1C                     bpl        +0x1E /* 0000026C */
  226. 00000250  5240                     addq.w     D0, 1
  227. 00000252  6B18                     bmi        +0x1A /* 0000026C */
  228. 00000254  536E FFEA                subq.w     [A6 - 0x16], 1
  229. 00000258  486E FFE8                pea.l      [A6 - 0x18]
  230. 0000025C  A8A4                     syscall    InvertRect
  231. 0000025E  605E                     bra        +0x60 /* 000002BE */
  232. label00000260:
  233. 00000260  536E FFE2                subq.w     [A6 - 0x1E], 1
  234. 00000264  486E FFE0                pea.l      [A6 - 0x20]
  235. 00000268  A8A4                     syscall    InvertRect
  236. 0000026A  6052                     bra        +0x54 /* 000002BE */
  237. label0000026C:
  238. 0000026C  486E FFF0                pea.l      [A6 - 0x10]
  239. 00000270  3F07                     move.w     -[A7], D7
  240. 00000272  4EBA 0096                jsr        [PC + 0x96 /* 0000030A */]
  241. 00000276  486E FFD8                pea.l      [A6 - 0x28]
  242. 0000027A  4EBA FF6E                jsr        [PC - 0x92 /* 000001EA */]
  243. 0000027E  486E FFD0                pea.l      [A6 - 0x30]
  244. 00000282  4EBA FF66                jsr        [PC - 0x9A /* 000001EA */]
  245. 00000286  206E 0008                movea.l    A0, [A6 + 0x8]
  246. 0000028A  2050                     movea.l    A0, [A0]
  247. 0000028C  4A28 0011                tst.b      [A0 + 0x11]
  248. 00000290  4FEF 000E                lea.l      A7, [A7 + 0xE]
  249. 00000294  661C                     bne        +0x1E /* 000002B2 */
  250. 00000296  2F3C 0001 0000           move.l     -[A7], 0x10000
  251. 0000029C  486E FFE8                pea.l      [A6 - 0x18]
  252. 000002A0  4EBA 0024                jsr        [PC + 0x24 /* 000002C6 */]
  253. 000002A4  4297                     clr.l      [A7]
  254. 000002A6  486E FFE0                pea.l      [A6 - 0x20]
  255. 000002AA  4EBA 001A                jsr        [PC + 0x1A /* 000002C6 */]
  256. 000002AE  4FEF 000C                lea.l      A7, [A7 + 0xC]
  257. label000002B2:
  258. 000002B2  486E FFD8                pea.l      [A6 - 0x28]
  259. 000002B6  A8A1                     syscall    FrameRect
  260. 000002B8  486E FFD0                pea.l      [A6 - 0x30]
  261. 000002BC  A8A1                     syscall    FrameRect
  262. label000002BE:
  263. 000002BE  4CDF 0880                movem.l    D7,A3, [A7]+
  264. 000002C2  4E5E                     unlink     A6
  265. 000002C4  4E75                     rts
  266. fn000002C6:
  267. 000002C6  4E56 FFF2                link       A6, -0x000E
  268. 000002CA  3D7C 0001 FFF6           move.w     [A6 - 0xA], 0x1
  269. 000002D0  206E 0008                movea.l    A0, [A6 + 0x8]
  270. 000002D4  2D50 FFF8                move.l     [A6 - 0x8], [A0]
  271. 000002D8  2D68 0004 FFFC           move.l     [A6 - 0x4], [A0 + 0x4]
  272. 000002DE  4A6E 000C                tst.w      [A6 + 0xC]
  273. 000002E2  6706                     beq        +0x8 /* 000002EA */
  274. 000002E4  4EBA 017E                jsr        [PC + 0x17E /* 00000464 */]
  275. 000002E8  6004                     bra        +0x6 /* 000002EE */
  276. label000002EA:
  277. 000002EA  4EBA 0198                jsr        [PC + 0x198 /* 00000484 */]
  278. label000002EE:
  279. 000002EE  2D40 FFF2                move.l     [A6 - 0xE], D0
  280. 000002F2  486E FFF2                pea.l      [A6 - 0xE]
  281. 000002F6  486E FFF8                pea.l      [A6 - 0x8]
  282. 000002FA  486E FFF8                pea.l      [A6 - 0x8]
  283. 000002FE  3F2E 000E                move.w     -[A7], [A6 + 0xE]
  284. 00000302  42A7                     clr.l      -[A7]
  285. 00000304  A8EB                     syscall    StdBits
  286. 00000306  4E5E                     unlink     A6
  287. 00000308  4E75                     rts
  288. fn0000030A:
  289. 0000030A  4E56 FEF8                link       A6, -0x0108
  290. 0000030E  48E7 0710                movem.l    -[A7], D5,D6,D7,A3
  291. 00000312  266E 000A                movea.l    A3, [A6 + 0xA]
  292. 00000316  306E 0008                movea.w    A0, [A6 + 0x8]
  293. 0000031A  2F08                     move.l     -[A7], A0
  294. 0000031C  486E FF00                pea.l      [A6 - 0x100]
  295. 00000320  4EBA 0346                jsr        [PC + 0x346 /* 00000668 */]
  296. 00000324  486E FEF8                pea.l      [A6 - 0x108]
  297. 00000328  A88B                     syscall    GetFontInfo
  298. 0000032A  3E2E FEFA                move.w     D7, [A6 - 0x106]
  299. 0000032E  DE6E FEF8                add.w      D7, [A6 - 0x108]
  300. 00000332  3C13                     move.w     D6, [A3]
  301. 00000334  302B 0004                move.w     D0, [A3 + 0x4]
  302. 00000338  9046                     sub.w      D0, D6
  303. 0000033A  48C0                     ext.l      D0
  304. 0000033C  81FC 0002                divs.w     D0, 0x2
  305. 00000340  D046                     add.w      D0, D6
  306. 00000342  3A00                     move.w     D5, D0
  307. 00000344  2F0B                     move.l     -[A7], A3
  308. 00000346  4EBA FEA2                jsr        [PC - 0x15E /* 000001EA */]
  309. 0000034A  4257                     clr.w      [A7]
  310. 0000034C  486E FF00                pea.l      [A6 - 0x100]
  311. 00000350  A88C                     syscall    StringWidth
  312. 00000352  302B 0006                move.w     D0, [A3 + 0x6]
  313. 00000356  905F                     sub.w      D0, [A7]+
  314. 00000358  5740                     subq.w     D0, 3
  315. 0000035A  3E80                     move.w     [A7], D0
  316. 0000035C  2007                     move.l     D0, D7
  317. 0000035E  48C0                     ext.l      D0
  318. 00000360  81FC 0002                divs.w     D0, 0x2
  319. 00000364  3205                     move.w     D1, D5
  320. 00000366  9240                     sub.w      D1, D0
  321. 00000368  D26E FEF8                add.w      D1, [A6 - 0x108]
  322. 0000036C  3F01                     move.w     -[A7], D1
  323. 0000036E  A893                     syscall    MoveTo
  324. 00000370  486E FF00                pea.l      [A6 - 0x100]
  325. 00000374  A884                     syscall    DrawString
  326. 00000376  2F0B                     move.l     -[A7], A3
  327. 00000378  A8A1                     syscall    FrameRect
  328. 0000037A  4CDF 08E0                movem.l    D5,D6,D7,A3, [A7]+
  329. 0000037E  4E5E                     unlink     A6
  330. 00000380  4E75                     rts
  331. fn00000382:
  332. 00000382  4E56 FFFC                link       A6, -0x0004
  333. 00000386  48E7 1F30                movem.l    -[A7], D3,D4,D5,D6,D7,A2,A3
  334. 0000038A  246E 0008                movea.l    A2, [A6 + 0x8]
  335. 0000038E  2E2E 000C                move.l     D7, [A6 + 0xC]
  336. 00000392  262E 0010                move.l     D3, [A6 + 0x10]
  337. 00000396  282E 0014                move.l     D4, [A6 + 0x14]
  338. 0000039A  2A2E 0018                move.l     D5, [A6 + 0x18]
  339. 0000039E  2047                     movea.l    A0, D7
  340. 000003A0  316A 000A 0002           move.w     [A0 + 0x2], [A2 + 0xA]
  341. 000003A6  47EA 000E                lea.l      A3, [A2 + 0xE]
  342. 000003AA  70F6                     moveq.l    D0, 0xFFFFFFF6
  343. 000003AC  D053                     add.w      D0, [A3]
  344. 000003AE  2047                     movea.l    A0, D7
  345. 000003B0  3140 0006                move.w     [A0 + 0x6], D0
  346. 000003B4  2047                     movea.l    A0, D7
  347. 000003B6  30AA 0008                move.w     [A0], [A2 + 0x8]
  348. 000003BA  7C0C                     moveq.l    D6, 0x0C
  349. 000003BC  DC8A                     add.l      D6, A2
  350. 000003BE  2046                     movea.l    A0, D6
  351. 000003C0  2247                     movea.l    A1, D7
  352. 000003C2  3350 0004                move.w     [A1 + 0x4], [A0]
  353. 000003C6  2047                     movea.l    A0, D7
  354. 000003C8  70FF                     moveq.l    D0, 0xFFFFFFFF
  355. 000003CA  D068 0006                add.w      D0, [A0 + 0x6]
  356. 000003CE  206E 001C                movea.l    A0, [A6 + 0x1C]
  357. 000003D2  3140 0002                move.w     [A0 + 0x2], D0
  358. 000003D6  2245                     movea.l    A1, D5
  359. 000003D8  3340 0002                move.w     [A1 + 0x2], D0
  360. 000003DC  3013                     move.w     D0, [A3]
  361. 000003DE  3140 0006                move.w     [A0 + 0x6], D0
  362. 000003E2  2245                     movea.l    A1, D5
  363. 000003E4  3340 0006                move.w     [A1 + 0x6], D0
  364. 000003E8  2245                     movea.l    A1, D5
  365. 000003EA  32AA 0008                move.w     [A1], [A2 + 0x8]
  366. 000003EE  700A                     moveq.l    D0, 0x0A
  367. 000003F0  D06A 0008                add.w      D0, [A2 + 0x8]
  368. 000003F4  2245                     movea.l    A1, D5
  369. 000003F6  3340 0004                move.w     [A1 + 0x4], D0
  370. 000003FA  2245                     movea.l    A1, D5
  371. 000003FC  70FF                     moveq.l    D0, 0xFFFFFFFF
  372. 000003FE  D069 0004                add.w      D0, [A1 + 0x4]
  373. 00000402  3080                     move.w     [A0], D0
  374. 00000404  2246                     movea.l    A1, D6
  375. 00000406  3151 0004                move.w     [A0 + 0x4], [A1]
  376. 0000040A  70F7                     moveq.l    D0, 0xFFFFFFF7
  377. 0000040C  D053                     add.w      D0, [A3]
  378. 0000040E  2244                     movea.l    A1, D4
  379. 00000410  3340 0002                move.w     [A1 + 0x2], D0
  380. 00000414  2243                     movea.l    A1, D3
  381. 00000416  3340 0002                move.w     [A1 + 0x2], D0
  382. 0000041A  2243                     movea.l    A1, D3
  383. 0000041C  7008                     moveq.l    D0, 0x08
  384. 0000041E  D069 0002                add.w      D0, [A1 + 0x2]
  385. 00000422  2244                     movea.l    A1, D4
  386. 00000424  3340 0006                move.w     [A1 + 0x6], D0
  387. 00000428  2243                     movea.l    A1, D3
  388. 0000042A  3340 0006                move.w     [A1 + 0x6], D0
  389. 0000042E  7001                     moveq.l    D0, 0x01
  390. 00000430  D06A 0008                add.w      D0, [A2 + 0x8]
  391. 00000434  2243                     movea.l    A1, D3
  392. 00000436  3280                     move.w     [A1], D0
  393. 00000438  2243                     movea.l    A1, D3
  394. 0000043A  7008                     moveq.l    D0, 0x08
  395. 0000043C  D051                     add.w      D0, [A1]
  396. 0000043E  2243                     movea.l    A1, D3
  397. 00000440  3340 0004                move.w     [A1 + 0x4], D0
  398. 00000444  2246                     movea.l    A1, D6
  399. 00000446  70FF                     moveq.l    D0, 0xFFFFFFFF
  400. 00000448  D051                     add.w      D0, [A1]
  401. 0000044A  2244                     movea.l    A1, D4
  402. 0000044C  3340 0004                move.w     [A1 + 0x4], D0
  403. 00000450  2244                     movea.l    A1, D4
  404. 00000452  70F8                     moveq.l    D0, 0xFFFFFFF8
  405. 00000454  D069 0004                add.w      D0, [A1 + 0x4]
  406. 00000458  2244                     movea.l    A1, D4
  407. 0000045A  3280                     move.w     [A1], D0
  408. 0000045C  4CDF 0CF8                movem.l    D3,D4,D5,D6,D7,A2,A3, [A7]+
  409. 00000460  4E5E                     unlink     A6
  410. 00000462  4E75                     rts
  411. fn00000464:
  412. 00000464  4E56 FFFC                link       A6, -0x0004
  413. 00000468  41EE FFFC                lea.l      A0, [A6 - 0x4]
  414. 0000046C  43FA 0006                lea.l      A1, [PC + 0x6 /* 00000474, value 0x10387C */]
  415. 00000470  2089                     move.l     [A0], A1
  416. 00000472  6008                     bra        +0xA /* 0000047C */
  417. 00000474  0010 387C                ori.b      [A0], 0x7C /* '|' */
  418. 00000478  FE38                     .extension 0xE38 // unimplemented
  419. 0000047A  3800                     move.w     D4, D0
  420. label0000047C:
  421. 0000047C  202E FFFC                move.l     D0, [A6 - 0x4]
  422. 00000480  4E5E                     unlink     A6
  423. 00000482  4E75                     rts
  424. fn00000484:
  425. 00000484  4E56 FFFC                link       A6, -0x0004
  426. 00000488  41EE FFFC                lea.l      A0, [A6 - 0x4]
  427. 0000048C  43FA 0006                lea.l      A1, [PC + 0x6 /* 00000494, value 0x3838FE */]
  428. 00000490  2089                     move.l     [A0], A1
  429. 00000492  6008                     bra        +0xA /* 0000049C */
  430. 00000494  0038 38FE 7C38           ori.b      [0x00007C38], 0xFE
  431. 0000049A  1000                     move.b     D0, D0
  432. label0000049C:
  433. 0000049C  202E FFFC                move.l     D0, [A6 - 0x4]
  434. 000004A0  4E5E                     unlink     A6
  435. 000004A2  4E75                     rts
  436. fn000004A4:
  437. 000004A4  4E56 FFD8                link       A6, -0x0028
  438. 000004A8  206E 0008                movea.l    A0, [A6 + 0x8]
  439. 000004AC  2050                     movea.l    A0, [A0]
  440. 000004AE  0C28 00FF 0011           cmpi.b     [A0 + 0x11], 0xFF
  441. 000004B4  6604                     bne        +0x6 /* 000004BA */
  442. 000004B6  7000                     moveq.l    D0, 0x00
  443. 000004B8  604C                     bra        +0x4E /* 00000506 */
  444. label000004BA:
  445. 000004BA  486E FFD8                pea.l      [A6 - 0x28]
  446. 000004BE  486E FFE0                pea.l      [A6 - 0x20]
  447. 000004C2  486E FFE8                pea.l      [A6 - 0x18]
  448. 000004C6  486E FFF0                pea.l      [A6 - 0x10]
  449. 000004CA  486E FFF8                pea.l      [A6 - 0x8]
  450. 000004CE  206E 0008                movea.l    A0, [A6 + 0x8]
  451. 000004D2  2F10                     move.l     -[A7], [A0]
  452. 000004D4  4EBA FEAC                jsr        [PC - 0x154 /* 00000382 */]
  453. 000004D8  4217                     clr.b      [A7]
  454. 000004DA  2F2E 000C                move.l     -[A7], [A6 + 0xC]
  455. 000004DE  486E FFE0                pea.l      [A6 - 0x20]
  456. 000004E2  A8AD                     syscall    PtInRect
  457. 000004E4  4A1F                     tst.b      [A7]+
  458. 000004E6  4FEF 0016                lea.l      A7, [A7 + 0x16]
  459. 000004EA  6704                     beq        +0x6 /* 000004F0 */
  460. 000004EC  7014                     moveq.l    D0, 0x14
  461. 000004EE  6016                     bra        +0x18 /* 00000506 */
  462. label000004F0:
  463. 000004F0  4227                     clr.b      -[A7]
  464. 000004F2  2F2E 000C                move.l     -[A7], [A6 + 0xC]
  465. 000004F6  486E FFD8                pea.l      [A6 - 0x28]
  466. 000004FA  A8AD                     syscall    PtInRect
  467. 000004FC  4A1F                     tst.b      [A7]+
  468. 000004FE  6704                     beq        +0x6 /* 00000504 */
  469. 00000500  7015                     moveq.l    D0, 0x15
  470. 00000502  6002                     bra        +0x4 /* 00000506 */
  471. label00000504:
  472. 00000504  7000                     moveq.l    D0, 0x00
  473. label00000506:
  474. 00000506  4E5E                     unlink     A6
  475. 00000508  4E75                     rts
  476. fn0000050A:
  477. 0000050A  4E56 FFCC                link       A6, -0x0034
  478. 0000050E  48E7 1F30                movem.l    -[A7], D3,D4,D5,D6,D7,A2,A3
  479. 00000512  266E 0008                movea.l    A3, [A6 + 0x8]
  480. 00000516  3E2E 000C                move.w     D7, [A6 + 0xC]
  481. 0000051A  42A7                     clr.l      -[A7]
  482. 0000051C  A975                     syscall    TickCount
  483. 0000051E  70D8                     moveq.l    D0, 0xFFFFFFD8
  484. 00000520  D09F                     add.l      D0, [A7]+
  485. 00000522  2D40 FFCC                move.l     [A6 - 0x34], D0
  486. 00000526  7C14                     moveq.l    D6, 0x14
  487. 00000528  426E FFD0                clr.w      [A6 - 0x30]
  488. 0000052C  3A07                     move.w     D5, D7
  489. 0000052E  3D7C 0005 FFD2           move.w     [A6 - 0x2E], 0x5
  490. 00000534  4A47                     tst.w      D7
  491. 00000536  6700 0128                beq        +0x12A /* 00000660 */
  492. 0000053A  3F05                     move.w     -[A7], D5
  493. 0000053C  2F0B                     move.l     -[A7], A3
  494. 0000053E  4EBA FCD2                jsr        [PC - 0x32E /* 00000212 */]
  495. 00000542  486E FFD4                pea.l      [A6 - 0x2C]
  496. 00000546  486E FFDC                pea.l      [A6 - 0x24]
  497. 0000054A  486E FFE4                pea.l      [A6 - 0x1C]
  498. 0000054E  486E FFEC                pea.l      [A6 - 0x14]
  499. 00000552  486E FFF4                pea.l      [A6 - 0xC]
  500. 00000556  2F13                     move.l     -[A7], [A3]
  501. 00000558  4EBA FE28                jsr        [PC - 0x1D8 /* 00000382 */]
  502. 0000055C  4FEF 001E                lea.l      A7, [A7 + 0x1E]
  503. label00000560:
  504. 00000560  2453                     movea.l    A2, [A3]
  505. 00000562  3007                     move.w     D0, D7
  506. 00000564  6B0C                     bmi        +0xE /* 00000572 */
  507. 00000566  0440 0015                subi.w     D0, 0x15
  508. 0000056A  670E                     beq        +0x10 /* 0000057A */
  509. 0000056C  6A04                     bpl        +0x6 /* 00000572 */
  510. 0000056E  5240                     addq.w     D0, 1
  511. 00000570  6A04                     bpl        +0x6 /* 00000576 */
  512. label00000572:
  513. 00000572  7800                     moveq.l    D4, 0x00
  514. 00000574  6006                     bra        +0x8 /* 0000057C */
  515. label00000576:
  516. 00000576  7801                     moveq.l    D4, 0x01
  517. 00000578  6002                     bra        +0x4 /* 0000057C */
  518. label0000057A:
  519. 0000057A  78FF                     moveq.l    D4, 0xFFFFFFFF
  520. label0000057C:
  521. 0000057C  4A44                     tst.w      D4
  522. 0000057E  676C                     beq        +0x6E /* 000005EC */
  523. 00000580  42A7                     clr.l      -[A7]
  524. 00000582  A975                     syscall    TickCount
  525. 00000584  201F                     move.l     D0, [A7]+
  526. 00000586  90AE FFCC                sub.l      D0, [A6 - 0x34]
  527. 0000058A  3046                     movea.w    A0, D6
  528. 0000058C  B1C0                     cmpa.l     A0, D0
  529. 0000058E  645C                     bcc        +0x5E /* 000005EC */
  530. 00000590  42A7                     clr.l      -[A7]
  531. 00000592  A975                     syscall    TickCount
  532. 00000594  2D5F FFCC                move.l     [A6 - 0x34], [A7]+
  533. 00000598  526E FFD0                addq.w     [A6 - 0x30], 1
  534. 0000059C  302E FFD0                move.w     D0, [A6 - 0x30]
  535. 000005A0  B06E FFD2                cmp.w      D0, [A6 - 0x2E]
  536. 000005A4  6F22                     ble        +0x24 /* 000005C8 */
  537. 000005A6  426E FFD0                clr.w      [A6 - 0x30]
  538. 000005AA  3006                     move.w     D0, D6
  539. 000005AC  6B1A                     bmi        +0x1C /* 000005C8 */
  540. 000005AE  0440 0014                subi.w     D0, 0x14
  541. 000005B2  670A                     beq        +0xC /* 000005BE */
  542. 000005B4  6A12                     bpl        +0x14 /* 000005C8 */
  543. 000005B6  0440 FFF4                subi.w     D0, 0xFFF4
  544. 000005BA  670A                     beq        +0xC /* 000005C6 */
  545. 000005BC  600A                     bra        +0xC /* 000005C8 */
  546. label000005BE:
  547. 000005BE  7C08                     moveq.l    D6, 0x08
  548. 000005C0  E3EE FFD2                lsl   .w   [A6 - 0x2E]
  549. 000005C4  6002                     bra        +0x4 /* 000005C8 */
  550. label000005C6:
  551. 000005C6  7C03                     moveq.l    D6, 0x03
  552. label000005C8:
  553. 000005C8  362A 0012                move.w     D3, [A2 + 0x12]
  554. 000005CC  D644                     add.w      D3, D4
  555. 000005CE  B66A 0014                cmp.w      D3, [A2 + 0x14]
  556. 000005D2  6D18                     blt        +0x1A /* 000005EC */
  557. 000005D4  B66A 0016                cmp.w      D3, [A2 + 0x16]
  558. 000005D8  6E12                     bgt        +0x14 /* 000005EC */
  559. 000005DA  D96A 0012                add.w      [A2 + 0x12], D4
  560. 000005DE  486E FFF4                pea.l      [A6 - 0xC]
  561. 000005E2  3F2A 0012                move.w     -[A7], [A2 + 0x12]
  562. 000005E6  4EBA FD22                jsr        [PC - 0x2DE /* 0000030A */]
  563. 000005EA  5C8F                     addq.l     A7, 6
  564. label000005EC:
  565. 000005EC  486E FFFC                pea.l      [A6 - 0x4]
  566. 000005F0  A972                     syscall    GetMouse
  567. 000005F2  3005                     move.w     D0, D5
  568. 000005F4  6B40                     bmi        +0x42 /* 00000636 */
  569. 000005F6  0440 0015                subi.w     D0, 0x15
  570. 000005FA  6720                     beq        +0x22 /* 0000061C */
  571. 000005FC  6A38                     bpl        +0x3A /* 00000636 */
  572. 000005FE  5240                     addq.w     D0, 1
  573. 00000600  6B34                     bmi        +0x36 /* 00000636 */
  574. 00000602  4227                     clr.b      -[A7]
  575. 00000604  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  576. 00000608  486E FFDC                pea.l      [A6 - 0x24]
  577. 0000060C  A8AD                     syscall    PtInRect
  578. 0000060E  4A1F                     tst.b      [A7]+
  579. 00000610  6704                     beq        +0x6 /* 00000616 */
  580. 00000612  7014                     moveq.l    D0, 0x14
  581. 00000614  6002                     bra        +0x4 /* 00000618 */
  582. label00000616:
  583. 00000616  7000                     moveq.l    D0, 0x00
  584. label00000618:
  585. 00000618  3600                     move.w     D3, D0
  586. 0000061A  601C                     bra        +0x1E /* 00000638 */
  587. label0000061C:
  588. 0000061C  4227                     clr.b      -[A7]
  589. 0000061E  2F2E FFFC                move.l     -[A7], [A6 - 0x4]
  590. 00000622  486E FFD4                pea.l      [A6 - 0x2C]
  591. 00000626  A8AD                     syscall    PtInRect
  592. 00000628  4A1F                     tst.b      [A7]+
  593. 0000062A  6704                     beq        +0x6 /* 00000630 */
  594. 0000062C  7015                     moveq.l    D0, 0x15
  595. 0000062E  6002                     bra        +0x4 /* 00000632 */
  596. label00000630:
  597. 00000630  7000                     moveq.l    D0, 0x00
  598. label00000632:
  599. 00000632  3600                     move.w     D3, D0
  600. 00000634  6002                     bra        +0x4 /* 00000638 */
  601. label00000636:
  602. 00000636  7600                     moveq.l    D3, 0x00
  603. label00000638:
  604. 00000638  BE43                     cmp.w      D7, D3
  605. 0000063A  670C                     beq        +0xE /* 00000648 */
  606. 0000063C  3F05                     move.w     -[A7], D5
  607. 0000063E  2F0B                     move.l     -[A7], A3
  608. 00000640  4EBA FBD0                jsr        [PC - 0x430 /* 00000212 */]
  609. 00000644  3E03                     move.w     D7, D3
  610. 00000646  5C8F                     addq.l     A7, 6
  611. label00000648:
  612. 00000648  4227                     clr.b      -[A7]
  613. 0000064A  A973                     syscall    StillDown
  614. 0000064C  4A1F                     tst.b      [A7]+
  615. 0000064E  6600 FF10                bne        -0xEE /* 00000560 */
  616. 00000652  4A47                     tst.w      D7
  617. 00000654  670A                     beq        +0xC /* 00000660 */
  618. 00000656  3F05                     move.w     -[A7], D5
  619. 00000658  2F0B                     move.l     -[A7], A3
  620. 0000065A  4EBA FBB6                jsr        [PC - 0x44A /* 00000212 */]
  621. 0000065E  5C8F                     addq.l     A7, 6
  622. label00000660:
  623. 00000660  4CDF 0CF8                movem.l    D3,D4,D5,D6,D7,A2,A3, [A7]+
  624. 00000664  4E5E                     unlink     A6
  625. 00000666  4E75                     rts
  626. fn00000668:
  627. 00000668  206F 0004                movea.l    A0, [A7 + 0x4]
  628. 0000066C  202F 0008                move.l     D0, [A7 + 0x8]
  629. 00000670  4267                     clr.w      -[A7]
  630. 00000672  A9EE                     syscall    Pack7/DecStr68K
  631. 00000674  205F                     movea.l    A0, [A7]+
  632. 00000676  504F                     addq.w     A7, 8
  633. 00000678  4ED0                     jmp        [A0]
  634.